﻿<?xml version="1.0" encoding="utf-8" standalone="yes"?>
<?application progid="SMath Studio Desktop" version="0.98.6179.21440"?>
<regions>
  <settings>
    <identity>
      <id>d268f242-c463-46b6-997f-e0c4e60162ba</id>
      <revision>3</revision>
    </identity>
    <calculation>
      <precision>4</precision>
      <exponentialThreshold>5</exponentialThreshold>
      <fractions>decimal</fractions>
    </calculation>
    <pageModel active="true" printAreas="true" simpleEqualsOnly="false" printBackgroundImages="true">
      <paper id="1" orientation="Portrait" width="850" height="1100" />
      <margins left="39" right="39" top="39" bottom="39" />
      <header alignment="Center" color="#a9a9a9">&amp;[DATE] &amp;[TIME] - &amp;[FILENAME]</header>
      <footer alignment="Center" color="#a9a9a9">&amp;[PAGENUM] / &amp;[COUNT]</footer>
      <backgrounds />
    </pageModel>
    <dependencies>
      <assembly name="SMath Studio Desktop" version="0.98.6179.21440" guid="a37cba83-b69c-4c71-9992-55ff666763bd" />
      <assembly name="Math Region" version="0.98.6179.21440" guid="02f1ab51-215b-466e-a74d-5d8b1cf85e8d" />
      <assembly name="Special Functions" version="1.11.6179.21442" guid="2814e667-4e12-48b1-8d51-194e480eabc5" />
      <assembly name="Text Region" version="1.10.6179.21446" guid="485d28c5-349a-48b6-93be-12a35a1c1e39" />
      <assembly name="Plot Region" version="1.9.6179.21450" guid="c451c2b5-798b-4f08-b9ec-b90963d1ddaa" />
    </dependencies>
    <mode debug="true" />
  </settings>
  <region id="0" left="18" top="27" width="400" height="31" color="#000000" bgColor="#80ffff" fontSize="14">
    <text lang="eng">
      <p bold="true">Solving for a vectorised function </p>
    </text>
  </region>
  <region id="1" left="18" top="63" width="175" height="45" color="#000000" bgColor="#ffff80" fontSize="10">
    <math>
      <input>
        <e type="operand">x</e>
        <e type="function" args="1">f</e>
        <e type="operand">x</e>
        <e type="operand">2</e>
        <e type="operand">π</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">/</e>
        <e type="operand">2</e>
        <e type="operand">π</e>
        <e type="operator" args="2">*</e>
        <e type="operand">x</e>
        <e type="operator" args="2">/</e>
        <e type="function" preserve="true" args="1">tanh</e>
        <e type="operator" args="2">*</e>
        <e type="function" preserve="true" args="1">sqrt</e>
        <e type="operator" args="2">:</e>
      </input>
    </math>
  </region>
  <region id="2" left="486" top="90" width="96" height="26" color="#000000" bgColor="#ebebeb" fontSize="10">
    <math>
      <input>
        <e type="operand">t0</e>
        <e type="operand">1</e>
        <e type="function" preserve="true" args="1">time</e>
        <e type="operator" args="2">:</e>
      </input>
    </math>
  </region>
  <region id="3" left="18" top="126" width="585" height="312" color="#000000" bgColor="#ffe1ff" fontSize="10">
    <text lang="eng">
      <p>In Mathematics, an InverseFunction is the solution of this function. f(x) is the model of difficulty, documented in Mathematica 4.0. The seeded solve scanner is of no gain versus the direct "Sol".The 'roots' can't be applied wrt the derivative that does not take discrete vector of values. In lieu, the 'solve' block concludes pretty well.. a bit slow._____________________________Note: the function starts existing around 'x = 0.02, f(0.02) = 0.0564'our choice to solve is wise , down to lower possible limit. The upper limit 0.99 is practical. In fact, at  1, the solution is infinite.Pushing a bit more, 'solve' cries to murder. _____________________________This exercise is purely didactic/demo. No further exploration will be applied. It aims at setting up the solver wisely. The f(x) does not plot part of the low region, this default is dueto Smath too granular in this region.</p>
    </text>
  </region>
  <region id="4" left="18" top="477" width="500" height="170" border="true" color="#000000" bgColor="#ebebeb" fontSize="10">
    <math optimize="2" fractionType="auto" decimalPlaces="6">
      <description active="true" position="Top" lang="eng">
        <p>Design a discrete function inverser  in the L, H span , N points</p>
      </description>
      <input>
        <e type="operand">f</e>
        <e type="operand">L</e>
        <e type="operand">H</e>
        <e type="operand">N</e>
        <e type="function" args="4">Inverse</e>
        <e type="operand">dx</e>
        <e type="operand">H</e>
        <e type="operand">L</e>
        <e type="operator" args="2">-</e>
        <e type="operand">N</e>
        <e type="operator" args="2">/</e>
        <e type="operator" args="2">:</e>
        <e type="operand">i</e>
        <e type="operand">1</e>
        <e type="operand">N</e>
        <e type="function" preserve="true" args="2">range</e>
        <e type="operand">ω</e>
        <e type="operand">i</e>
        <e type="function" preserve="true" args="2">el</e>
        <e type="operand">L</e>
        <e type="operand">dx</e>
        <e type="operator" args="2">-</e>
        <e type="bracket">(</e>
        <e type="operand">dx</e>
        <e type="operand">i</e>
        <e type="operator" args="2">*</e>
        <e type="operator" args="2">+</e>
        <e type="operator" args="2">:</e>
        <e type="function" preserve="true" args="3">for</e>
        <e type="operand" style="string" />
        <e type="operand">j</e>
        <e type="operand">1</e>
        <e type="operand">ω</e>
        <e type="function" preserve="true" args="1">rows</e>
        <e type="function" preserve="true" args="2">range</e>
        <e type="operand">sol</e>
        <e type="operand">j</e>
        <e type="function" preserve="true" args="2">el</e>
        <e type="operand">x</e>
        <e type="function" args="1">f</e>
        <e type="operand">ω</e>
        <e type="operand">j</e>
        <e type="function" preserve="true" args="2">el</e>
        <e type="operator" args="2">-</e>
        <e type="operand">0</e>
        <e type="operator" args="2">≡</e>
        <e type="operand">x</e>
        <e type="operand">0.02</e>
        <e type="operand">20</e>
        <e type="function" preserve="true" args="4">solve</e>
        <e type="operator" args="2">:</e>
        <e type="function" preserve="true" args="3">for</e>
        <e type="operand">ω</e>
        <e type="operand">sol</e>
        <e type="function" preserve="true" args="2">augment</e>
        <e type="operand">5</e>
        <e type="operand">1</e>
        <e type="function" preserve="true" args="7">line</e>
        <e type="operator" args="2">:</e>
      </input>
    </math>
  </region>
  <region id="5" left="18" top="693" width="269" height="26" color="#000000" bgColor="#ffffff" fontSize="10">
    <math fractionType="auto" decimalPlaces="6">
      <input>
        <e type="operand">Sol</e>
        <e type="operand">f</e>
        <e type="operand">0.06</e>
        <e type="operand">0.99</e>
        <e type="operand">100</e>
        <e type="function" args="4">Inverse</e>
        <e type="operator" args="2">:</e>
      </input>
    </math>
  </region>
  <region id="6" left="369" top="693" width="149" height="26" color="#000000" bgColor="#ebebeb" fontSize="10">
    <math decimalPlaces="0">
      <input>
        <e type="operand">1</e>
        <e type="function" preserve="true" args="1">time</e>
        <e type="operand">t0</e>
        <e type="operator" args="2">-</e>
      </input>
      <result action="numeric">
        <e type="operand">16</e>
        <e type="operand" style="unit">s</e>
        <e type="operator" args="2">*</e>
      </result>
    </math>
  </region>
  <region id="7" left="18" top="729" width="240" height="158" color="#000000" bgColor="#ffffff" fontSize="10">
    <plot type="2d" render="points" scale_x="0.672454884898439" scale_y="17.4494022688864" scale_z="11.7339357942706" rotate_x="0" rotate_y="0" rotate_z="0" transpose_x="-65" transpose_y="-51" transpose_z="0">
      <description active="true" position="Top" lang="eng">
        <p>Magnify the function to see </p>
      </description>
      <input>
        <e type="operand">50</e>
        <e type="operand">x</e>
        <e type="function" args="1">f</e>
        <e type="operator" args="2">*</e>
        <e type="operand">Sol</e>
        <e type="operand">2</e>
        <e type="operand">1</e>
        <e type="function" preserve="true" args="4">sys</e>
      </input>
    </plot>
  </region>
  <region id="8" left="279" top="729" width="240" height="158" color="#000000" bgColor="#ffffff" fontSize="10">
    <plot type="2d" render="lines" scale_x="17.4494022688864" scale_y="11.9181765377272" scale_z="207.965056718407" rotate_x="0" rotate_y="0" rotate_z="0" transpose_x="0" transpose_y="0" transpose_z="0">
      <description active="true" position="Top" lang="eng">
        <p>The native function</p>
      </description>
      <input>
        <e type="operand">x</e>
        <e type="function" args="1">f</e>
      </input>
    </plot>
  </region>
</regions>